global diagonal

section .text

diagonal:
	xor rcx, rcx		;pongo en 0 el registro del loop
	mov cx, si		;muevo el 1er operando 
	mov rsi, rcx
	mov rdx, rdi
	mov rax, rdx

.ciclo:
	mov r8w, [rdi]
	mov [rdx], r8w
	lea rdi, [rdi+2*rsi+2]
	lea rdx, [rdx+2] 

	loop .ciclo
	
.fin:
	mov rdi, rax
	ret

